"192.168.0.1:sipop"

SUMAENTRADASHQ

Descriptions

There is no desription for procedure SUMAENTRADASHQ

Input Parameters

Output Parameters

There are no output parameters for procedure SUMAENTRADASHQ

Definition

CREATE PROCEDURE SUMAENTRADASHQ (
    IDARTICULO CHAR (8) CHARACTER SET NONE,
    ENTRADA FLOAT)
AS
DECLARE VARIABLE VARTENTRADA FLOAT DEFAULT  0.0;
DECLARE VARIABLE VARTSALIDA FLOAT DEFAULT  0.0;
DECLARE VARIABLE VARTOTAL FLOAT DEFAULT  0.0;
BEGIN

SELECT SUM(CANTIDAD) AS TOTAL FROM detalleingresohq
WHERE ARTICULO= :IDARTICULO
INTO: VARTENTRADA;

if (VARTENTRADA is null) then
begin
  VARTENTRADA = 0;
end


/*SELECT SUM(CANTIDAD) AS TOTAL FROM DETALLESALIDA
WHERE ARTICULO= :IDARTICULO
   INTO: VARTSALIDA;

if(:vartsalida is null ) then
begin
vartsalida =0;
end*/

UPDATE inventariohq SET
   EXISTENCIA = EXISTENCIA + :ENTRADA,
   entradas = :VARTENTRADA,
   ultima_entrada = 'TODAY'
   WHERE ID_ARTICULO = :IDARTICULO ;

END

This file was generated with EMS InterBase/FireBird Manager (www.ibmanager.com) at 09/06/2005 05:52 p.m.